/ Program : test01.as
/
/ Desc : This program computes c = a + b
/
/-------------------------------------------
/
/ Code Section
/
*0200			/ start at address 0200
Main, 	cla cll
	//AND
	tad A
	and B
	dca C

	//TAD
	cla cll
	tad D
	tad E
	dca F

	tad F
	tad G
	dca H

	//ISZ
	cla cll
	isz Q
	tad Q
	dca Q

	isz J
	tad J
	dca J

	//DCA
	cla cll
	tad K
	tad L
	dca M
	
	//JMS JMP
	cla cll
	jms SUBR
	tad N
	dca O
	jmp NEXT
SUBR,  0
	tad N
	jmp i SUBR
NEXT, 0

//	jmp Main	/ To continue - goto Main
/
/ Data Section
/
*0250 			/ place data at address 0250
A, 	3377		/ A @ memindex 250
B, 	7733		/ B @ memindex 251
C, 	0000 		/ C @ memindex 252
D, 	3333		/ D @ memindex 253
E, 	4444 		/ E @ memindex 254
F, 	0000		/ F @ memindex 255
G, 	0001 		/ G @ memindex 256
H, 	7777 		/ H @ memindex 257
Q, 	7777 		/ Q @ memindex 260
J, 	0000 		/ J @ memindex 261
K, 	1111 		/ G @ memindex 262
L, 	3333 		/ H @ memindex 263
M, 	0000 		/ I @ memindex 264
N, 	0001 		/ N @ memindex 265
O, 	0000 		/ N @ memindex 266
$Main 			/ End of Program; Main is entry point
